home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / kenoga1a / form3.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1999-06-27  |  73.3 KB  |  2,206 lines

  1. VERSION 5.00
  2. Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.1#0"; "COMDLG32.OCX"
  3. Begin VB.Form Form3 
  4.    BackColor       =   &H00FFFFFF&
  5.    Caption         =   "Form3"
  6.    ClientHeight    =   8040
  7.    ClientLeft      =   165
  8.    ClientTop       =   735
  9.    ClientWidth     =   9255
  10.    LinkTopic       =   "Form3"
  11.    ScaleHeight     =   8040
  12.    ScaleWidth      =   9255
  13.    StartUpPosition =   3  'Windows Default
  14.    Begin MSComDlg.CommonDialog CommonDialog1 
  15.       Left            =   4380
  16.       Top             =   3780
  17.       _ExtentX        =   847
  18.       _ExtentY        =   847
  19.       _Version        =   327680
  20.    End
  21.    Begin VB.Frame Frame1 
  22.       Appearance      =   0  'Flat
  23.       BackColor       =   &H80000005&
  24.       ForeColor       =   &H80000008&
  25.       Height          =   7245
  26.       Left            =   30
  27.       TabIndex        =   0
  28.       Top             =   -30
  29.       Width           =   7395
  30.       Begin VB.TextBox Text160 
  31.          Height          =   315
  32.          Left            =   5040
  33.          TabIndex        =   165
  34.          Top             =   6780
  35.          Width           =   285
  36.       End
  37.       Begin VB.TextBox Text159 
  38.          Height          =   315
  39.          Left            =   4530
  40.          TabIndex        =   164
  41.          Top             =   6780
  42.          Width           =   285
  43.       End
  44.       Begin VB.TextBox Text158 
  45.          Height          =   315
  46.          Left            =   3960
  47.          TabIndex        =   163
  48.          Top             =   6780
  49.          Width           =   285
  50.       End
  51.       Begin VB.TextBox Text157 
  52.          Height          =   315
  53.          Left            =   3420
  54.          TabIndex        =   162
  55.          Top             =   6780
  56.          Width           =   285
  57.       End
  58.       Begin VB.TextBox Text156 
  59.          Height          =   315
  60.          Left            =   2880
  61.          TabIndex        =   161
  62.          Top             =   6780
  63.          Width           =   285
  64.       End
  65.       Begin VB.TextBox Text155 
  66.          Height          =   315
  67.          Left            =   2340
  68.          TabIndex        =   160
  69.          Top             =   6780
  70.          Width           =   285
  71.       End
  72.       Begin VB.TextBox Text154 
  73.          Height          =   315
  74.          Left            =   1800
  75.          TabIndex        =   159
  76.          Top             =   6780
  77.          Width           =   285
  78.       End
  79.       Begin VB.TextBox Text153 
  80.          Height          =   315
  81.          Left            =   1230
  82.          TabIndex        =   158
  83.          Top             =   6780
  84.          Width           =   285
  85.       End
  86.       Begin VB.TextBox Text152 
  87.          Height          =   315
  88.          Left            =   690
  89.          TabIndex        =   157
  90.          Top             =   6780
  91.          Width           =   285
  92.       End
  93.       Begin VB.TextBox Text151 
  94.          Height          =   315
  95.          Left            =   150
  96.          TabIndex        =   156
  97.          Top             =   6780
  98.          Width           =   285
  99.       End
  100.       Begin VB.TextBox Text150 
  101.          Height          =   315
  102.          Left            =   5010
  103.          TabIndex        =   155
  104.          Top             =   6120
  105.          Width           =   285
  106.       End
  107.       Begin VB.TextBox Text149 
  108.          Height          =   315
  109.          Left            =   4500
  110.          TabIndex        =   154
  111.          Top             =   6120
  112.          Width           =   285
  113.       End
  114.       Begin VB.TextBox Text148 
  115.          Height          =   315
  116.          Left            =   3930
  117.          TabIndex        =   153
  118.          Top             =   6120
  119.          Width           =   285
  120.       End
  121.       Begin VB.TextBox Text147 
  122.          Height          =   315
  123.          Left            =   3390
  124.          TabIndex        =   152
  125.          Top             =   6120
  126.          Width           =   285
  127.       End
  128.       Begin VB.TextBox Text146 
  129.          Height          =   315
  130.          Left            =   2850
  131.          TabIndex        =   151
  132.          Top             =   6120
  133.          Width           =   285
  134.       End
  135.       Begin VB.TextBox Text145 
  136.          Height          =   315
  137.          Left            =   2310
  138.          TabIndex        =   150
  139.          Top             =   6120
  140.          Width           =   285
  141.       End
  142.       Begin VB.TextBox Text144 
  143.          Height          =   315
  144.          Left            =   1770
  145.          TabIndex        =   149
  146.          Top             =   6120
  147.          Width           =   285
  148.       End
  149.       Begin VB.TextBox Text143 
  150.          Height          =   315
  151.          Left            =   1200
  152.          TabIndex        =   148
  153.          Top             =   6120
  154.          Width           =   285
  155.       End
  156.       Begin VB.TextBox Text142 
  157.          Height          =   315
  158.          Left            =   660
  159.          TabIndex        =   147
  160.          Top             =   6120
  161.          Width           =   285
  162.       End
  163.       Begin VB.TextBox Text141 
  164.          Height          =   315
  165.          Left            =   120
  166.          TabIndex        =   146
  167.          Top             =   6120
  168.          Width           =   285
  169.       End
  170.       Begin VB.TextBox Text140 
  171.          Height          =   315
  172.          Left            =   5040
  173.          TabIndex        =   145
  174.          Top             =   5460
  175.          Width           =   285
  176.       End
  177.       Begin VB.TextBox Text139 
  178.          Height          =   315
  179.          Left            =   4530
  180.          TabIndex        =   144
  181.          Top             =   5460
  182.          Width           =   285
  183.       End
  184.       Begin VB.TextBox Text138 
  185.          Height          =   315
  186.          Left            =   3960
  187.          TabIndex        =   143
  188.          Top             =   5460
  189.          Width           =   285
  190.       End
  191.       Begin VB.TextBox Text137 
  192.          Height          =   315
  193.          Left            =   3420
  194.          TabIndex        =   142
  195.          Top             =   5460
  196.          Width           =   285
  197.       End
  198.       Begin VB.TextBox Text136 
  199.          Height          =   315
  200.          Left            =   2880
  201.          TabIndex        =   141
  202.          Top             =   5460
  203.          Width           =   285
  204.       End
  205.       Begin VB.TextBox Text135 
  206.          Height          =   315
  207.          Left            =   2340
  208.          TabIndex        =   140
  209.          Top             =   5460
  210.          Width           =   285
  211.       End
  212.       Begin VB.TextBox Text134 
  213.          Height          =   315
  214.          Left            =   1800
  215.          TabIndex        =   139
  216.          Top             =   5460
  217.          Width           =   285
  218.       End
  219.       Begin VB.TextBox Text133 
  220.          Height          =   315
  221.          Left            =   1230
  222.          TabIndex        =   138
  223.          Top             =   5460
  224.          Width           =   285
  225.       End
  226.       Begin VB.TextBox Text132 
  227.          Height          =   315
  228.          Left            =   690
  229.          TabIndex        =   137
  230.          Top             =   5460
  231.          Width           =   285
  232.       End
  233.       Begin VB.TextBox Text131 
  234.          Height          =   315
  235.          Left            =   150
  236.          TabIndex        =   136
  237.          Top             =   5460
  238.          Width           =   285
  239.       End
  240.       Begin VB.TextBox Text130 
  241.          Height          =   315
  242.          Left            =   5010
  243.          TabIndex        =   135
  244.          Top             =   4800
  245.          Width           =   285
  246.       End
  247.       Begin VB.TextBox Text129 
  248.          Height          =   315
  249.          Left            =   4500
  250.          TabIndex        =   134
  251.          Top             =   4800
  252.          Width           =   285
  253.       End
  254.       Begin VB.TextBox Text128 
  255.          Height          =   315
  256.          Left            =   3930
  257.          TabIndex        =   133
  258.          Top             =   4800
  259.          Width           =   285
  260.       End
  261.       Begin VB.TextBox Text127 
  262.          Height          =   315
  263.          Left            =   3390
  264.          TabIndex        =   132
  265.          Top             =   4800
  266.          Width           =   285
  267.       End
  268.       Begin VB.TextBox Text126 
  269.          Height          =   315
  270.          Left            =   2850
  271.          TabIndex        =   131
  272.          Top             =   4800
  273.          Width           =   285
  274.       End
  275.       Begin VB.TextBox Text125 
  276.          Height          =   315
  277.          Left            =   2310
  278.          TabIndex        =   130
  279.          Top             =   4800
  280.          Width           =   285
  281.       End
  282.       Begin VB.TextBox Text124 
  283.          Height          =   315
  284.          Left            =   1770
  285.          TabIndex        =   129
  286.          Top             =   4800
  287.          Width           =   285
  288.       End
  289.       Begin VB.TextBox Text123 
  290.          Height          =   315
  291.          Left            =   1200
  292.          TabIndex        =   128
  293.          Top             =   4800
  294.          Width           =   285
  295.       End
  296.       Begin VB.TextBox Text122 
  297.          Height          =   315
  298.          Left            =   660
  299.          TabIndex        =   127
  300.          Top             =   4800
  301.          Width           =   285
  302.       End
  303.       Begin VB.TextBox Text121 
  304.          Height          =   315
  305.          Left            =   120
  306.          TabIndex        =   126
  307.          Top             =   4800
  308.          Width           =   285
  309.       End
  310.       Begin VB.TextBox Text120 
  311.          Height          =   315
  312.          Left            =   5010
  313.          TabIndex        =   125
  314.          Top             =   3720
  315.          Width           =   285
  316.       End
  317.       Begin VB.TextBox Text119 
  318.          Height          =   315
  319.          Left            =   4500
  320.          TabIndex        =   124
  321.          Top             =   3720
  322.          Width           =   285
  323.       End
  324.       Begin VB.TextBox Text118 
  325.          Height          =   315
  326.          Left            =   3930
  327.          TabIndex        =   123
  328.          Top             =   3720
  329.          Width           =   285
  330.       End
  331.       Begin VB.TextBox Text117 
  332.          Height          =   315
  333.          Left            =   3390
  334.          TabIndex        =   122
  335.          Top             =   3720
  336.          Width           =   285
  337.       End
  338.       Begin VB.TextBox Text116 
  339.          Height          =   315
  340.          Left            =   2850
  341.          TabIndex        =   121
  342.          Top             =   3720
  343.          Width           =   285
  344.       End
  345.       Begin VB.TextBox Text115 
  346.          Height          =   315
  347.          Left            =   2310
  348.          TabIndex        =   120
  349.          Top             =   3720
  350.          Width           =   285
  351.       End
  352.       Begin VB.TextBox Text114 
  353.          Height          =   315
  354.          Left            =   1770
  355.          TabIndex        =   119
  356.          Top             =   3720
  357.          Width           =   285
  358.       End
  359.       Begin VB.TextBox Text113 
  360.          Height          =   315
  361.          Left            =   1200
  362.          TabIndex        =   118
  363.          Top             =   3720
  364.          Width           =   285
  365.       End
  366.       Begin VB.TextBox Text112 
  367.          Height          =   315
  368.          Left            =   660
  369.          TabIndex        =   117
  370.          Top             =   3720
  371.          Width           =   285
  372.       End
  373.       Begin VB.TextBox Text111 
  374.          Height          =   315
  375.          Left            =   120
  376.          TabIndex        =   116
  377.          Top             =   3720
  378.          Width           =   285
  379.       End
  380.       Begin VB.TextBox Text110 
  381.          Height          =   315
  382.          Left            =   5040
  383.          TabIndex        =   115
  384.          Top             =   3060
  385.          Width           =   285
  386.       End
  387.       Begin VB.TextBox Text109 
  388.          Height          =   315
  389.          Left            =   4530
  390.          TabIndex        =   114
  391.          Top             =   3060
  392.          Width           =   285
  393.       End
  394.       Begin VB.TextBox Text108 
  395.          Height          =   315
  396.          Left            =   3960
  397.          TabIndex        =   113
  398.          Top             =   3060
  399.          Width           =   285
  400.       End
  401.       Begin VB.TextBox Text107 
  402.          Height          =   315
  403.          Left            =   3420
  404.          TabIndex        =   112
  405.          Top             =   3060
  406.          Width           =   285
  407.       End
  408.       Begin VB.TextBox Text106 
  409.          Height          =   315
  410.          Left            =   2880
  411.          TabIndex        =   111
  412.          Top             =   3060
  413.          Width           =   285
  414.       End
  415.       Begin VB.TextBox Text105 
  416.          Height          =   315
  417.          Left            =   2340
  418.          TabIndex        =   110
  419.          Top             =   3060
  420.          Width           =   285
  421.       End
  422.       Begin VB.TextBox Text104 
  423.          Height          =   315
  424.          Left            =   1800
  425.          TabIndex        =   109
  426.          Top             =   3060
  427.          Width           =   285
  428.       End
  429.       Begin VB.TextBox Text103 
  430.          Height          =   315
  431.          Left            =   1230
  432.          TabIndex        =   108
  433.          Top             =   3060
  434.          Width           =   285
  435.       End
  436.       Begin VB.TextBox Text102 
  437.          Height          =   315
  438.          Left            =   690
  439.          TabIndex        =   107
  440.          Top             =   3060
  441.          Width           =   285
  442.       End
  443.       Begin VB.TextBox Text101 
  444.          Height          =   315
  445.          Left            =   150
  446.          TabIndex        =   106
  447.          Top             =   3060
  448.          Width           =   285
  449.       End
  450.       Begin VB.TextBox Text100 
  451.          Height          =   315
  452.          Left            =   5040
  453.          TabIndex        =   105
  454.          Top             =   2400
  455.          Width           =   285
  456.       End
  457.       Begin VB.TextBox Text99 
  458.          Height          =   315
  459.          Left            =   4530
  460.          TabIndex        =   104
  461.          Top             =   2400
  462.          Width           =   285
  463.       End
  464.       Begin VB.TextBox Text98 
  465.          Height          =   315
  466.          Left            =   3960
  467.          TabIndex        =   103
  468.          Top             =   2400
  469.          Width           =   285
  470.       End
  471.       Begin VB.TextBox Text97 
  472.          Height          =   315
  473.          Left            =   3420
  474.          TabIndex        =   102
  475.          Top             =   2400
  476.          Width           =   285
  477.       End
  478.       Begin VB.TextBox Text96 
  479.          Height          =   315
  480.          Left            =   2880
  481.          TabIndex        =   101
  482.          Top             =   2400
  483.          Width           =   285
  484.       End
  485.       Begin VB.TextBox Text95 
  486.          Height          =   315
  487.          Left            =   2340
  488.          TabIndex        =   100
  489.          Top             =   2400
  490.          Width           =   285
  491.       End
  492.       Begin VB.TextBox Text94 
  493.          Height          =   315
  494.          Left            =   1800
  495.          TabIndex        =   99
  496.          Top             =   2400
  497.          Width           =   285
  498.       End
  499.       Begin VB.TextBox Text93 
  500.          Height          =   315
  501.          Left            =   1230
  502.          TabIndex        =   98
  503.          Top             =   2400
  504.          Width           =   285
  505.       End
  506.       Begin VB.TextBox Text92 
  507.          Height          =   315
  508.          Left            =   690
  509.          TabIndex        =   97
  510.          Top             =   2400
  511.          Width           =   285
  512.       End
  513.       Begin VB.TextBox Text91 
  514.          Height          =   315
  515.          Left            =   150
  516.          TabIndex        =   96
  517.          Top             =   2400
  518.          Width           =   285
  519.       End
  520.       Begin VB.TextBox Text90 
  521.          Height          =   315
  522.          Left            =   5010
  523.          TabIndex        =   95
  524.          Top             =   1770
  525.          Width           =   285
  526.       End
  527.       Begin VB.TextBox Text89 
  528.          Height          =   315
  529.          Left            =   4500
  530.          TabIndex        =   94
  531.          Top             =   1770
  532.          Width           =   285
  533.       End
  534.       Begin VB.TextBox Text88 
  535.          Height          =   315
  536.          Left            =   3930
  537.          TabIndex        =   93
  538.          Top             =   1770
  539.          Width           =   285
  540.       End
  541.       Begin VB.TextBox Text87 
  542.          Height          =   315
  543.          Left            =   3390
  544.          TabIndex        =   92
  545.          Top             =   1770
  546.          Width           =   285
  547.       End
  548.       Begin VB.TextBox Text86 
  549.          Height          =   315
  550.          Left            =   2850
  551.          TabIndex        =   91
  552.          Top             =   1770
  553.          Width           =   285
  554.       End
  555.       Begin VB.TextBox Text85 
  556.          Height          =   315
  557.          Left            =   2310
  558.          TabIndex        =   90
  559.          Top             =   1770
  560.          Width           =   285
  561.       End
  562.       Begin VB.TextBox Text84 
  563.          Height          =   315
  564.          Left            =   1770
  565.          TabIndex        =   89
  566.          Top             =   1770
  567.          Width           =   285
  568.       End
  569.       Begin VB.TextBox Text83 
  570.          Height          =   315
  571.          Left            =   1200
  572.          TabIndex        =   88
  573.          Top             =   1770
  574.          Width           =   285
  575.       End
  576.       Begin VB.TextBox Text82 
  577.          Height          =   315
  578.          Left            =   660
  579.          TabIndex        =   87
  580.          Top             =   1770
  581.          Width           =   285
  582.       End
  583.       Begin VB.TextBox Text81 
  584.          Height          =   315
  585.          Left            =   120
  586.          TabIndex        =   86
  587.          Top             =   1770
  588.          Width           =   285
  589.       End
  590.       Begin VB.TextBox Text80 
  591.          Appearance      =   0  'Flat
  592.          BackColor       =   &H00FFFFFF&
  593.          BeginProperty Font 
  594.             Name            =   "Times New Roman"
  595.             Size            =   12
  596.             Charset         =   0
  597.             Weight          =   700
  598.             Underline       =   0   'False
  599.             Italic          =   0   'False
  600.             Strikethrough   =   0   'False
  601.          EndProperty
  602.          Height          =   630
  603.          Left            =   4890
  604.          TabIndex        =   84
  605.          Text            =   "80"
  606.          Top             =   6540
  607.          Width           =   504
  608.       End
  609.       Begin VB.TextBox Text79 
  610.          Appearance      =   0  'Flat
  611.          BackColor       =   &H00FFFFFF&
  612.          BeginProperty Font 
  613.             Name            =   "Times New Roman"
  614.             Size            =   12
  615.             Charset         =   0
  616.             Weight          =   700
  617.             Underline       =   0   'False
  618.             Italic          =   0   'False
  619.             Strikethrough   =   0   'False
  620.          EndProperty
  621.          Height          =   630
  622.          Left            =   4350
  623.          TabIndex        =   83
  624.          Text            =   "79"
  625.          Top             =   6540
  626.          Width           =   504
  627.       End
  628.       Begin VB.TextBox Text78 
  629.          Appearance      =   0  'Flat
  630.          BackColor       =   &H00FFFFFF&
  631.          BeginProperty Font 
  632.             Name            =   "Times New Roman"
  633.             Size            =   12
  634.             Charset         =   0
  635.             Weight          =   700
  636.             Underline       =   0   'False
  637.             Italic          =   0   'False
  638.             Strikethrough   =   0   'False
  639.          EndProperty
  640.          Height          =   630
  641.          Left            =   3810
  642.          TabIndex        =   82
  643.          Text            =   "78"
  644.          Top             =   6540
  645.          Width           =   504
  646.       End
  647.       Begin VB.TextBox Text77 
  648.          Appearance      =   0  'Flat
  649.          BackColor       =   &H00FFFFFF&
  650.          BeginProperty Font 
  651.             Name            =   "Times New Roman"
  652.             Size            =   12
  653.             Charset         =   0
  654.             Weight          =   700
  655.             Underline       =   0   'False
  656.             Italic          =   0   'False
  657.             Strikethrough   =   0   'False
  658.          EndProperty
  659.          Height          =   630
  660.          Left            =   3270
  661.          TabIndex        =   81
  662.          Text            =   "77"
  663.          Top             =   6540
  664.          Width           =   504
  665.       End
  666.       Begin VB.TextBox Text76 
  667.          Appearance      =   0  'Flat
  668.          BackColor       =   &H00FFFFFF&
  669.          BeginProperty Font 
  670.             Name            =   "Times New Roman"
  671.             Size            =   12
  672.             Charset         =   0
  673.             Weight          =   700
  674.             Underline       =   0   'False
  675.             Italic          =   0   'False
  676.             Strikethrough   =   0   'False
  677.          EndProperty
  678.          Height          =   630
  679.          Left            =   2730
  680.          TabIndex        =   80
  681.          Text            =   "76"
  682.          Top             =   6540
  683.          Width           =   504
  684.       End
  685.       Begin VB.TextBox Text75 
  686.          Appearance      =   0  'Flat
  687.          BackColor       =   &H00FFFFFF&
  688.          BeginProperty Font 
  689.             Name            =   "Times New Roman"
  690.             Size            =   12
  691.             Charset         =   0
  692.             Weight          =   700
  693.             Underline       =   0   'False
  694.             Italic          =   0   'False
  695.             Strikethrough   =   0   'False
  696.          EndProperty
  697.          Height          =   630
  698.          Left            =   2190
  699.          TabIndex        =   79
  700.          Text            =   "75"
  701.          Top             =   6540
  702.          Width           =   504
  703.       End
  704.       Begin VB.TextBox Text74 
  705.          Appearance      =   0  'Flat
  706.          BackColor       =   &H00FFFFFF&
  707.          BeginProperty Font 
  708.             Name            =   "Times New Roman"
  709.             Size            =   12
  710.             Charset         =   0
  711.             Weight          =   700
  712.             Underline       =   0   'False
  713.             Italic          =   0   'False
  714.             Strikethrough   =   0   'False
  715.          EndProperty
  716.          Height          =   630
  717.          Left            =   1650
  718.          TabIndex        =   78
  719.          Text            =   "74"
  720.          Top             =   6540
  721.          Width           =   504
  722.       End
  723.       Begin VB.TextBox Text73 
  724.          Appearance      =   0  'Flat
  725.          BackColor       =   &H00FFFFFF&
  726.          BeginProperty Font 
  727.             Name            =   "Times New Roman"
  728.             Size            =   12
  729.             Charset         =   0
  730.             Weight          =   700
  731.             Underline       =   0   'False
  732.             Italic          =   0   'False
  733.             Strikethrough   =   0   'False
  734.          EndProperty
  735.          Height          =   630
  736.          Left            =   1110
  737.          TabIndex        =   77
  738.          Text            =   "73"
  739.          Top             =   6540
  740.          Width           =   504
  741.       End
  742.       Begin VB.TextBox Text72 
  743.          Appearance      =   0  'Flat
  744.          BackColor       =   &H00FFFFFF&
  745.          BeginProperty Font 
  746.             Name            =   "Times New Roman"
  747.             Size            =   12
  748.             Charset         =   0
  749.             Weight          =   700
  750.             Underline       =   0   'False
  751.             Italic          =   0   'False
  752.             Strikethrough   =   0   'False
  753.          EndProperty
  754.          Height          =   630
  755.          Left            =   570
  756.          TabIndex        =   76
  757.          Text            =   "72"
  758.          Top             =   6540
  759.          Width           =   504
  760.       End
  761.       Begin VB.TextBox Text71 
  762.          Appearance      =   0  'Flat
  763.          BackColor       =   &H00FFFFFF&
  764.          BeginProperty Font 
  765.             Name            =   "Times New Roman"
  766.             Size            =   12
  767.             Charset         =   0
  768.             Weight          =   700
  769.             Underline       =   0   'False
  770.             Italic          =   0   'False
  771.             Strikethrough   =   0   'False
  772.          EndProperty
  773.          Height          =   630
  774.          Left            =   30
  775.          TabIndex        =   75
  776.          Text            =   "71"
  777.          Top             =   6540
  778.          Width           =   504
  779.       End
  780.       Begin VB.TextBox Text70 
  781.          Appearance      =   0  'Flat
  782.          BackColor       =   &H00FFFFFF&
  783.          BeginProperty Font 
  784.             Name            =   "Times New Roman"
  785.             Size            =   12
  786.             Charset         =   0
  787.             Weight          =   700
  788.             Underline       =   0   'False
  789.             Italic          =   0   'False
  790.             Strikethrough   =   0   'False
  791.          EndProperty
  792.          Height          =   630
  793.          Left            =   4890
  794.          TabIndex        =   74
  795.          Text            =   "70"
  796.          Top             =   5880
  797.          Width           =   504
  798.       End
  799.       Begin VB.TextBox Text69 
  800.          Appearance      =   0  'Flat
  801.          BackColor       =   &H00FFFFFF&
  802.          BeginProperty Font 
  803.             Name            =   "Times New Roman"
  804.             Size            =   12
  805.             Charset         =   0
  806.             Weight          =   700
  807.             Underline       =   0   'False
  808.             Italic          =   0   'False
  809.             Strikethrough   =   0   'False
  810.          EndProperty
  811.          Height          =   630
  812.          Left            =   4350
  813.          TabIndex        =   73
  814.          Text            =   "69"
  815.          Top             =   5880
  816.          Width           =   504
  817.       End
  818.       Begin VB.TextBox Text68 
  819.          Appearance      =   0  'Flat
  820.          BackColor       =   &H00FFFFFF&
  821.          BeginProperty Font 
  822.             Name            =   "Times New Roman"
  823.             Size            =   12
  824.             Charset         =   0
  825.             Weight          =   700
  826.             Underline       =   0   'False
  827.             Italic          =   0   'False
  828.             Strikethrough   =   0   'False
  829.          EndProperty
  830.          Height          =   630
  831.          Left            =   3810
  832.          TabIndex        =   72
  833.          Text            =   "68"
  834.          Top             =   5880
  835.          Width           =   504
  836.       End
  837.       Begin VB.TextBox Text67 
  838.          Appearance      =   0  'Flat
  839.          BackColor       =   &H00FFFFFF&
  840.          BeginProperty Font 
  841.             Name            =   "Times New Roman"
  842.             Size            =   12
  843.             Charset         =   0
  844.             Weight          =   700
  845.             Underline       =   0   'False
  846.             Italic          =   0   'False
  847.             Strikethrough   =   0   'False
  848.          EndProperty
  849.          Height          =   630
  850.          Left            =   3270
  851.          TabIndex        =   71
  852.          Text            =   "67"
  853.          Top             =   5880
  854.          Width           =   504
  855.       End
  856.       Begin VB.TextBox Text66 
  857.          Appearance      =   0  'Flat
  858.          BackColor       =   &H00FFFFFF&
  859.          BeginProperty Font 
  860.             Name            =   "Times New Roman"
  861.             Size            =   12
  862.             Charset         =   0
  863.             Weight          =   700
  864.             Underline       =   0   'False
  865.             Italic          =   0   'False
  866.             Strikethrough   =   0   'False
  867.          EndProperty
  868.          Height          =   630
  869.          Left            =   2730
  870.          TabIndex        =   70
  871.          Text            =   "66"
  872.          Top             =   5880
  873.          Width           =   504
  874.       End
  875.       Begin VB.TextBox Text65 
  876.          Appearance      =   0  'Flat
  877.          BackColor       =   &H00FFFFFF&
  878.          BeginProperty Font 
  879.             Name            =   "Times New Roman"
  880.             Size            =   12
  881.             Charset         =   0
  882.             Weight          =   700
  883.             Underline       =   0   'False
  884.             Italic          =   0   'False
  885.             Strikethrough   =   0   'False
  886.          EndProperty
  887.          Height          =   630
  888.          Left            =   2190
  889.          TabIndex        =   69
  890.          Text            =   "65"
  891.          Top             =   5880
  892.          Width           =   504
  893.       End
  894.       Begin VB.TextBox Text64 
  895.          Appearance      =   0  'Flat
  896.          BackColor       =   &H00FFFFFF&
  897.          BeginProperty Font 
  898.             Name            =   "Times New Roman"
  899.             Size            =   12
  900.             Charset         =   0
  901.             Weight          =   700
  902.             Underline       =   0   'False
  903.             Italic          =   0   'False
  904.             Strikethrough   =   0   'False
  905.          EndProperty
  906.          Height          =   630
  907.          Left            =   1650
  908.          TabIndex        =   68
  909.          Text            =   "64"
  910.          Top             =   5880
  911.          Width           =   504
  912.       End
  913.       Begin VB.TextBox Text63 
  914.          Appearance      =   0  'Flat
  915.          BackColor       =   &H00FFFFFF&
  916.          BeginProperty Font 
  917.             Name            =   "Times New Roman"
  918.             Size            =   12
  919.             Charset         =   0
  920.             Weight          =   700
  921.             Underline       =   0   'False
  922.             Italic          =   0   'False
  923.             Strikethrough   =   0   'False
  924.          EndProperty
  925.          Height          =   630
  926.          Left            =   1110
  927.          TabIndex        =   67
  928.          Text            =   "63"
  929.          Top             =   5880
  930.          Width           =   504
  931.       End
  932.       Begin VB.TextBox Text62 
  933.          Appearance      =   0  'Flat
  934.          BackColor       =   &H00FFFFFF&
  935.          BeginProperty Font 
  936.             Name            =   "Times New Roman"
  937.             Size            =   12
  938.             Charset         =   0
  939.             Weight          =   700
  940.             Underline       =   0   'False
  941.             Italic          =   0   'False
  942.             Strikethrough   =   0   'False
  943.          EndProperty
  944.          Height          =   630
  945.          Left            =   570
  946.          TabIndex        =   66
  947.          Text            =   "62"
  948.          Top             =   5880
  949.          Width           =   504
  950.       End
  951.       Begin VB.TextBox Text61 
  952.          Appearance      =   0  'Flat
  953.          BackColor       =   &H00FFFFFF&
  954.          BeginProperty Font 
  955.             Name            =   "Times New Roman"
  956.             Size            =   12
  957.             Charset         =   0
  958.             Weight          =   700
  959.             Underline       =   0   'False
  960.             Italic          =   0   'False
  961.             Strikethrough   =   0   'False
  962.          EndProperty
  963.          Height          =   630
  964.          Left            =   30
  965.          TabIndex        =   65
  966.          Text            =   "61"
  967.          Top             =   5880
  968.          Width           =   504
  969.       End
  970.       Begin VB.TextBox Text60 
  971.          Appearance      =   0  'Flat
  972.          BackColor       =   &H00FFFFFF&
  973.          BeginProperty Font 
  974.             Name            =   "Times New Roman"
  975.             Size            =   12
  976.             Charset         =   0
  977.             Weight          =   700
  978.             Underline       =   0   'False
  979.             Italic          =   0   'False
  980.             Strikethrough   =   0   'False
  981.          EndProperty
  982.          Height          =   630
  983.          Left            =   4890
  984.          TabIndex        =   64
  985.          Text            =   "60"
  986.          Top             =   5220
  987.          Width           =   504
  988.       End
  989.       Begin VB.TextBox Text59 
  990.          Appearance      =   0  'Flat
  991.          BackColor       =   &H00FFFFFF&
  992.          BeginProperty Font 
  993.             Name            =   "Times New Roman"
  994.             Size            =   12
  995.             Charset         =   0
  996.             Weight          =   700
  997.             Underline       =   0   'False
  998.             Italic          =   0   'False
  999.             Strikethrough   =   0   'False
  1000.          EndProperty
  1001.          Height          =   630
  1002.          Left            =   4350
  1003.          TabIndex        =   63
  1004.          Text            =   "59"
  1005.          Top             =   5220
  1006.          Width           =   504
  1007.       End
  1008.       Begin VB.TextBox Text58 
  1009.          Appearance      =   0  'Flat
  1010.          BackColor       =   &H00FFFFFF&
  1011.          BeginProperty Font 
  1012.             Name            =   "Times New Roman"
  1013.             Size            =   12
  1014.             Charset         =   0
  1015.             Weight          =   700
  1016.             Underline       =   0   'False
  1017.             Italic          =   0   'False
  1018.             Strikethrough   =   0   'False
  1019.          EndProperty
  1020.          Height          =   630
  1021.          Left            =   3810
  1022.          TabIndex        =   62
  1023.          Text            =   "58"
  1024.          Top             =   5220
  1025.          Width           =   504
  1026.       End
  1027.       Begin VB.TextBox Text57 
  1028.          Appearance      =   0  'Flat
  1029.          BackColor       =   &H00FFFFFF&
  1030.          BeginProperty Font 
  1031.             Name            =   "Times New Roman"
  1032.             Size            =   12
  1033.             Charset         =   0
  1034.             Weight          =   700
  1035.             Underline       =   0   'False
  1036.             Italic          =   0   'False
  1037.             Strikethrough   =   0   'False
  1038.          EndProperty
  1039.          Height          =   630
  1040.          Left            =   3270
  1041.          TabIndex        =   61
  1042.          Text            =   "57"
  1043.          Top             =   5220
  1044.          Width           =   504
  1045.       End
  1046.       Begin VB.TextBox Text56 
  1047.          Appearance      =   0  'Flat
  1048.          BackColor       =   &H00FFFFFF&
  1049.          BeginProperty Font 
  1050.             Name            =   "Times New Roman"
  1051.             Size            =   12
  1052.             Charset         =   0
  1053.             Weight          =   700
  1054.             Underline       =   0   'False
  1055.             Italic          =   0   'False
  1056.             Strikethrough   =   0   'False
  1057.          EndProperty
  1058.          Height          =   630
  1059.          Left            =   2730
  1060.          TabIndex        =   60
  1061.          Text            =   "56"
  1062.          Top             =   5220
  1063.          Width           =   504
  1064.       End
  1065.       Begin VB.TextBox Text55 
  1066.          Appearance      =   0  'Flat
  1067.          BackColor       =   &H00FFFFFF&
  1068.          BeginProperty Font 
  1069.             Name            =   "Times New Roman"
  1070.             Size            =   12
  1071.             Charset         =   0
  1072.             Weight          =   700
  1073.             Underline       =   0   'False
  1074.             Italic          =   0   'False
  1075.             Strikethrough   =   0   'False
  1076.          EndProperty
  1077.          Height          =   630
  1078.          Left            =   2190
  1079.          TabIndex        =   59
  1080.          Text            =   "55"
  1081.          Top             =   5220
  1082.          Width           =   504
  1083.       End
  1084.       Begin VB.TextBox Text54 
  1085.          Appearance      =   0  'Flat
  1086.          BackColor       =   &H00FFFFFF&
  1087.          BeginProperty Font 
  1088.             Name            =   "Times New Roman"
  1089.             Size            =   12
  1090.             Charset         =   0
  1091.             Weight          =   700
  1092.             Underline       =   0   'False
  1093.             Italic          =   0   'False
  1094.             Strikethrough   =   0   'False
  1095.          EndProperty
  1096.          Height          =   630
  1097.          Left            =   1650
  1098.          TabIndex        =   58
  1099.          Text            =   "54"
  1100.          Top             =   5220
  1101.          Width           =   504
  1102.       End
  1103.       Begin VB.TextBox Text53 
  1104.          Appearance      =   0  'Flat
  1105.          BackColor       =   &H00FFFFFF&
  1106.          BeginProperty Font 
  1107.             Name            =   "Times New Roman"
  1108.             Size            =   12
  1109.             Charset         =   0
  1110.             Weight          =   700
  1111.             Underline       =   0   'False
  1112.             Italic          =   0   'False
  1113.             Strikethrough   =   0   'False
  1114.          EndProperty
  1115.          Height          =   630
  1116.          Left            =   1110
  1117.          TabIndex        =   57
  1118.          Text            =   "53"
  1119.          Top             =   5220
  1120.          Width           =   504
  1121.       End
  1122.       Begin VB.TextBox Text52 
  1123.          Appearance      =   0  'Flat
  1124.          BackColor       =   &H00FFFFFF&
  1125.          BeginProperty Font 
  1126.             Name            =   "Times New Roman"
  1127.             Size            =   12
  1128.             Charset         =   0
  1129.             Weight          =   700
  1130.             Underline       =   0   'False
  1131.             Italic          =   0   'False
  1132.             Strikethrough   =   0   'False
  1133.          EndProperty
  1134.          Height          =   630
  1135.          Left            =   570
  1136.          TabIndex        =   56
  1137.          Text            =   "52"
  1138.          Top             =   5220
  1139.          Width           =   504
  1140.       End
  1141.       Begin VB.TextBox Text51 
  1142.          Appearance      =   0  'Flat
  1143.          BackColor       =   &H00FFFFFF&
  1144.          BeginProperty Font 
  1145.             Name            =   "Times New Roman"
  1146.             Size            =   12
  1147.             Charset         =   0
  1148.             Weight          =   700
  1149.             Underline       =   0   'False
  1150.             Italic          =   0   'False
  1151.             Strikethrough   =   0   'False
  1152.          EndProperty
  1153.          Height          =   630
  1154.          Left            =   30
  1155.          TabIndex        =   55
  1156.          Text            =   "51"
  1157.          Top             =   5220
  1158.          Width           =   504
  1159.       End
  1160.       Begin VB.TextBox Text50 
  1161.          Appearance      =   0  'Flat
  1162.          BackColor       =   &H00FFFFFF&
  1163.          BeginProperty Font 
  1164.             Name            =   "Times New Roman"
  1165.             Size            =   12
  1166.             Charset         =   0
  1167.             Weight          =   700
  1168.             Underline       =   0   'False
  1169.             Italic          =   0   'False
  1170.             Strikethrough   =   0   'False
  1171.          EndProperty
  1172.          Height          =   630
  1173.          Left            =   4890
  1174.          TabIndex        =   54
  1175.          Text            =   "50"
  1176.          Top             =   4560
  1177.          Width           =   504
  1178.       End
  1179.       Begin VB.TextBox Text49 
  1180.          Appearance      =   0  'Flat
  1181.          BackColor       =   &H00FFFFFF&
  1182.          BeginProperty Font 
  1183.             Name            =   "Times New Roman"
  1184.             Size            =   12
  1185.             Charset         =   0
  1186.             Weight          =   700
  1187.             Underline       =   0   'False
  1188.             Italic          =   0   'False
  1189.             Strikethrough   =   0   'False
  1190.          EndProperty
  1191.          Height          =   630
  1192.          Left            =   4350
  1193.          TabIndex        =   53
  1194.          Text            =   "49"
  1195.          Top             =   4560
  1196.          Width           =   504
  1197.       End
  1198.       Begin VB.TextBox Text48 
  1199.          Appearance      =   0  'Flat
  1200.          BackColor       =   &H00FFFFFF&
  1201.          BeginProperty Font 
  1202.             Name            =   "Times New Roman"
  1203.             Size            =   12
  1204.             Charset         =   0
  1205.             Weight          =   700
  1206.             Underline       =   0   'False
  1207.             Italic          =   0   'False
  1208.             Strikethrough   =   0   'False
  1209.          EndProperty
  1210.          Height          =   630
  1211.          Left            =   3810
  1212.          TabIndex        =   52
  1213.          Text            =   "48"
  1214.          Top             =   4560
  1215.          Width           =   504
  1216.       End
  1217.       Begin VB.TextBox Text47 
  1218.          Appearance      =   0  'Flat
  1219.          BackColor       =   &H00FFFFFF&
  1220.          BeginProperty Font 
  1221.             Name            =   "Times New Roman"
  1222.             Size            =   12
  1223.             Charset         =   0
  1224.             Weight          =   700
  1225.             Underline       =   0   'False
  1226.             Italic          =   0   'False
  1227.             Strikethrough   =   0   'False
  1228.          EndProperty
  1229.          Height          =   630
  1230.          Left            =   3270
  1231.          TabIndex        =   51
  1232.          Text            =   "47"
  1233.          Top             =   4560
  1234.          Width           =   504
  1235.       End
  1236.       Begin VB.TextBox Text46 
  1237.          Appearance      =   0  'Flat
  1238.          BackColor       =   &H00FFFFFF&
  1239.          BeginProperty Font 
  1240.             Name            =   "Times New Roman"
  1241.             Size            =   12
  1242.             Charset         =   0
  1243.             Weight          =   700
  1244.             Underline       =   0   'False
  1245.             Italic          =   0   'False
  1246.             Strikethrough   =   0   'False
  1247.          EndProperty
  1248.          Height          =   630
  1249.          Left            =   2730
  1250.          TabIndex        =   50
  1251.          Text            =   "46"
  1252.          Top             =   4560
  1253.          Width           =   504
  1254.       End
  1255.       Begin VB.TextBox Text45 
  1256.          Appearance      =   0  'Flat
  1257.          BackColor       =   &H00FFFFFF&
  1258.          BeginProperty Font 
  1259.             Name            =   "Times New Roman"
  1260.             Size            =   12
  1261.             Charset         =   0
  1262.             Weight          =   700
  1263.             Underline       =   0   'False
  1264.             Italic          =   0   'False
  1265.             Strikethrough   =   0   'False
  1266.          EndProperty
  1267.          Height          =   630
  1268.          Left            =   2190
  1269.          TabIndex        =   49
  1270.          Text            =   "45"
  1271.          Top             =   4560
  1272.          Width           =   504
  1273.       End
  1274.       Begin VB.TextBox Text44 
  1275.          Appearance      =   0  'Flat
  1276.          BackColor       =   &H00FFFFFF&
  1277.          BeginProperty Font 
  1278.             Name            =   "Times New Roman"
  1279.             Size            =   12
  1280.             Charset         =   0
  1281.             Weight          =   700
  1282.             Underline       =   0   'False
  1283.             Italic          =   0   'False
  1284.             Strikethrough   =   0   'False
  1285.          EndProperty
  1286.          Height          =   630
  1287.          Left            =   1650
  1288.          TabIndex        =   48
  1289.          Text            =   "44"
  1290.          Top             =   4560
  1291.          Width           =   504
  1292.       End
  1293.       Begin VB.TextBox Text43 
  1294.          Appearance      =   0  'Flat
  1295.          BackColor       =   &H00FFFFFF&
  1296.          BeginProperty Font 
  1297.             Name            =   "Times New Roman"
  1298.             Size            =   12
  1299.             Charset         =   0
  1300.             Weight          =   700
  1301.             Underline       =   0   'False
  1302.             Italic          =   0   'False
  1303.             Strikethrough   =   0   'False
  1304.          EndProperty
  1305.          Height          =   630
  1306.          Left            =   1110
  1307.          TabIndex        =   47
  1308.          Text            =   "43"
  1309.          Top             =   4560
  1310.          Width           =   504
  1311.       End
  1312.       Begin VB.TextBox Text42 
  1313.          Appearance      =   0  'Flat
  1314.          BackColor       =   &H00FFFFFF&
  1315.          BeginProperty Font 
  1316.             Name            =   "Times New Roman"
  1317.             Size            =   12
  1318.             Charset         =   0
  1319.             Weight          =   700
  1320.             Underline       =   0   'False
  1321.             Italic          =   0   'False
  1322.             Strikethrough   =   0   'False
  1323.          EndProperty
  1324.          Height          =   630
  1325.          Left            =   570
  1326.          TabIndex        =   46
  1327.          Text            =   "42"
  1328.          Top             =   4560
  1329.          Width           =   504
  1330.       End
  1331.       Begin VB.TextBox Text41 
  1332.          Appearance      =   0  'Flat
  1333.          BackColor       =   &H00FFFFFF&
  1334.          BeginProperty Font 
  1335.             Name            =   "Times New Roman"
  1336.             Size            =   12
  1337.             Charset         =   0
  1338.             Weight          =   700
  1339.             Underline       =   0   'False
  1340.             Italic          =   0   'False
  1341.             Strikethrough   =   0   'False
  1342.          EndProperty
  1343.          Height          =   630
  1344.          Left            =   30
  1345.          TabIndex        =   45
  1346.          Text            =   "41"
  1347.          Top             =   4560
  1348.          Width           =   504
  1349.       End
  1350.       Begin VB.TextBox Text40 
  1351.          Appearance      =   0  'Flat
  1352.          BackColor       =   &H00FFFFFF&
  1353.          BeginProperty Font 
  1354.             Name            =   "Times New Roman"
  1355.             Size            =   12
  1356.             Charset         =   0
  1357.             Weight          =   700
  1358.             Underline       =   0   'False
  1359.             Italic          =   0   'False
  1360.             Strikethrough   =   0   'False
  1361.          EndProperty
  1362.          Height          =   630
  1363.          Left            =   4890
  1364.          TabIndex        =   44
  1365.          Text            =   "40"
  1366.          Top             =   3480
  1367.          Width           =   504
  1368.       End
  1369.       Begin VB.TextBox Text39 
  1370.          Appearance      =   0  'Flat
  1371.          BackColor       =   &H00FFFFFF&
  1372.          BeginProperty Font 
  1373.             Name            =   "Times New Roman"
  1374.             Size            =   12
  1375.             Charset         =   0
  1376.             Weight          =   700
  1377.             Underline       =   0   'False
  1378.             Italic          =   0   'False
  1379.             Strikethrough   =   0   'False
  1380.          EndProperty
  1381.          Height          =   630
  1382.          Left            =   4350
  1383.          TabIndex        =   43
  1384.          Text            =   "39"
  1385.          Top             =   3480
  1386.          Width           =   504
  1387.       End
  1388.       Begin VB.TextBox Text38 
  1389.          Appearance      =   0  'Flat
  1390.          BackColor       =   &H00FFFFFF&
  1391.          BeginProperty Font 
  1392.             Name            =   "Times New Roman"
  1393.             Size            =   12
  1394.             Charset         =   0
  1395.             Weight          =   700
  1396.             Underline       =   0   'False
  1397.             Italic          =   0   'False
  1398.             Strikethrough   =   0   'False
  1399.          EndProperty
  1400.          Height          =   630
  1401.          Left            =   3810
  1402.          TabIndex        =   42
  1403.          Text            =   "38"
  1404.          Top             =   3480
  1405.          Width           =   504
  1406.       End
  1407.       Begin VB.TextBox Text37 
  1408.          Appearance      =   0  'Flat
  1409.          BackColor       =   &H00FFFFFF&
  1410.          BeginProperty Font 
  1411.             Name            =   "Times New Roman"
  1412.             Size            =   12
  1413.             Charset         =   0
  1414.             Weight          =   700
  1415.             Underline       =   0   'False
  1416.             Italic          =   0   'False
  1417.             Strikethrough   =   0   'False
  1418.          EndProperty
  1419.          Height          =   630
  1420.          Left            =   3270
  1421.          TabIndex        =   41
  1422.          Text            =   "37"
  1423.          Top             =   3480
  1424.          Width           =   504
  1425.       End
  1426.       Begin VB.TextBox Text36 
  1427.          Appearance      =   0  'Flat
  1428.          BackColor       =   &H00FFFFFF&
  1429.          BeginProperty Font 
  1430.             Name            =   "Times New Roman"
  1431.             Size            =   12
  1432.             Charset         =   0
  1433.             Weight          =   700
  1434.             Underline       =   0   'False
  1435.             Italic          =   0   'False
  1436.             Strikethrough   =   0   'False
  1437.          EndProperty
  1438.          Height          =   630
  1439.          Left            =   2730
  1440.          TabIndex        =   40
  1441.          Text            =   "36"
  1442.          Top             =   3480
  1443.          Width           =   504
  1444.       End
  1445.       Begin VB.TextBox Text35 
  1446.          Appearance      =   0  'Flat
  1447.          BackColor       =   &H00FFFFFF&
  1448.          BeginProperty Font 
  1449.             Name            =   "Times New Roman"
  1450.             Size            =   12
  1451.             Charset         =   0
  1452.             Weight          =   700
  1453.             Underline       =   0   'False
  1454.             Italic          =   0   'False
  1455.             Strikethrough   =   0   'False
  1456.          EndProperty
  1457.          Height          =   630
  1458.          Left            =   2190
  1459.          TabIndex        =   39
  1460.          Text            =   "35"
  1461.          Top             =   3480
  1462.          Width           =   504
  1463.       End
  1464.       Begin VB.TextBox Text34 
  1465.          Appearance      =   0  'Flat
  1466.          BackColor       =   &H00FFFFFF&
  1467.          BeginProperty Font 
  1468.             Name            =   "Times New Roman"
  1469.             Size            =   12
  1470.             Charset         =   0
  1471.             Weight          =   700
  1472.             Underline       =   0   'False
  1473.             Italic          =   0   'False
  1474.             Strikethrough   =   0   'False
  1475.          EndProperty
  1476.          Height          =   630
  1477.          Left            =   1650
  1478.          TabIndex        =   38
  1479.          Text            =   "34"
  1480.          Top             =   3480
  1481.          Width           =   504
  1482.       End
  1483.       Begin VB.TextBox Text33 
  1484.          Appearance      =   0  'Flat
  1485.          BackColor       =   &H00FFFFFF&
  1486.          BeginProperty Font 
  1487.             Name            =   "Times New Roman"
  1488.             Size            =   12
  1489.             Charset         =   0
  1490.             Weight          =   700
  1491.             Underline       =   0   'False
  1492.             Italic          =   0   'False
  1493.             Strikethrough   =   0   'False
  1494.          EndProperty
  1495.          Height          =   630
  1496.          Left            =   1110
  1497.          TabIndex        =   37
  1498.          Text            =   "33"
  1499.          Top             =   3480
  1500.          Width           =   504
  1501.       End
  1502.       Begin VB.TextBox Text32 
  1503.          Appearance      =   0  'Flat
  1504.          BackColor       =   &H00FFFFFF&
  1505.          BeginProperty Font 
  1506.             Name            =   "Times New Roman"
  1507.             Size            =   12
  1508.             Charset         =   0
  1509.             Weight          =   700
  1510.             Underline       =   0   'False
  1511.             Italic          =   0   'False
  1512.             Strikethrough   =   0   'False
  1513.          EndProperty
  1514.          Height          =   630
  1515.          Left            =   570
  1516.          TabIndex        =   36
  1517.          Text            =   "32"
  1518.          Top             =   3480
  1519.          Width           =   504
  1520.       End
  1521.       Begin VB.TextBox Text31 
  1522.          Appearance      =   0  'Flat
  1523.          BackColor       =   &H00FFFFFF&
  1524.          BeginProperty Font 
  1525.             Name            =   "Times New Roman"
  1526.             Size            =   12
  1527.             Charset         =   0
  1528.             Weight          =   700
  1529.             Underline       =   0   'False
  1530.             Italic          =   0   'False
  1531.             Strikethrough   =   0   'False
  1532.          EndProperty
  1533.          Height          =   630
  1534.          Left            =   30
  1535.          TabIndex        =   35
  1536.          Text            =   "31"
  1537.          Top             =   3480
  1538.          Width           =   504
  1539.       End
  1540.       Begin VB.TextBox Text30 
  1541.          Appearance      =   0  'Flat
  1542.          BackColor       =   &H00FFFFFF&
  1543.          BeginProperty Font 
  1544.             Name            =   "Times New Roman"
  1545.             Size            =   12
  1546.             Charset         =   0
  1547.             Weight          =   700
  1548.             Underline       =   0   'False
  1549.             Italic          =   0   'False
  1550.             Strikethrough   =   0   'False
  1551.          EndProperty
  1552.          Height          =   630
  1553.          Left            =   4890
  1554.          TabIndex        =   34
  1555.          Text            =   "30"
  1556.          Top             =   2820
  1557.          Width           =   504
  1558.       End
  1559.       Begin VB.TextBox Text29 
  1560.          Appearance      =   0  'Flat
  1561.          BackColor       =   &H00FFFFFF&
  1562.          BeginProperty Font 
  1563.             Name            =   "Times New Roman"
  1564.             Size            =   12
  1565.             Charset         =   0
  1566.             Weight          =   700
  1567.             Underline       =   0   'False
  1568.             Italic          =   0   'False
  1569.             Strikethrough   =   0   'False
  1570.          EndProperty
  1571.          Height          =   630
  1572.          Left            =   4350
  1573.          TabIndex        =   33
  1574.          Text            =   "29"
  1575.          Top             =   2820
  1576.          Width           =   504
  1577.       End
  1578.       Begin VB.TextBox Text28 
  1579.          Appearance      =   0  'Flat
  1580.          BackColor       =   &H00FFFFFF&
  1581.          BeginProperty Font 
  1582.             Name            =   "Times New Roman"
  1583.             Size            =   12
  1584.             Charset         =   0
  1585.             Weight          =   700
  1586.             Underline       =   0   'False
  1587.             Italic          =   0   'False
  1588.             Strikethrough   =   0   'False
  1589.          EndProperty
  1590.          Height          =   630
  1591.          Left            =   3810
  1592.          TabIndex        =   32
  1593.          Text            =   "28"
  1594.          Top             =   2820
  1595.          Width           =   504
  1596.       End
  1597.       Begin VB.TextBox Text27 
  1598.          Appearance      =   0  'Flat
  1599.          BackColor       =   &H00FFFFFF&
  1600.          BeginProperty Font 
  1601.             Name            =   "Times New Roman"
  1602.             Size            =   12
  1603.             Charset         =   0
  1604.             Weight          =   700
  1605.             Underline       =   0   'False
  1606.             Italic          =   0   'False
  1607.             Strikethrough   =   0   'False
  1608.          EndProperty
  1609.          Height          =   630
  1610.          Left            =   3270
  1611.          TabIndex        =   31
  1612.          Text            =   "27"
  1613.          Top             =   2820
  1614.          Width           =   504
  1615.       End
  1616.       Begin VB.TextBox Text26 
  1617.          Appearance      =   0  'Flat
  1618.          BackColor       =   &H00FFFFFF&
  1619.          BeginProperty Font 
  1620.             Name            =   "Times New Roman"
  1621.             Size            =   12
  1622.             Charset         =   0
  1623.             Weight          =   700
  1624.             Underline       =   0   'False
  1625.             Italic          =   0   'False
  1626.             Strikethrough   =   0   'False
  1627.          EndProperty
  1628.          Height          =   630
  1629.          Left            =   2730
  1630.          TabIndex        =   30
  1631.          Text            =   "26"
  1632.          Top             =   2820
  1633.          Width           =   504
  1634.       End
  1635.       Begin VB.TextBox Text25 
  1636.          Appearance      =   0  'Flat
  1637.          BackColor       =   &H00FFFFFF&
  1638.          BeginProperty Font 
  1639.             Name            =   "Times New Roman"
  1640.             Size            =   12
  1641.             Charset         =   0
  1642.             Weight          =   700
  1643.             Underline       =   0   'False
  1644.             Italic          =   0   'False
  1645.             Strikethrough   =   0   'False
  1646.          EndProperty
  1647.          Height          =   630
  1648.          Left            =   2190
  1649.          TabIndex        =   29
  1650.          Text            =   "25"
  1651.          Top             =   2820
  1652.          Width           =   504
  1653.       End
  1654.       Begin VB.TextBox Text24 
  1655.          Appearance      =   0  'Flat
  1656.          BackColor       =   &H00FFFFFF&
  1657.          BeginProperty Font 
  1658.             Name            =   "Times New Roman"
  1659.             Size            =   12
  1660.             Charset         =   0
  1661.             Weight          =   700
  1662.             Underline       =   0   'False
  1663.             Italic          =   0   'False
  1664.             Strikethrough   =   0   'False
  1665.          EndProperty
  1666.          Height          =   630
  1667.          Left            =   1650
  1668.          TabIndex        =   28
  1669.          Text            =   "24"
  1670.          Top             =   2820
  1671.          Width           =   504
  1672.       End
  1673.       Begin VB.TextBox Text23 
  1674.          Appearance      =   0  'Flat
  1675.          BackColor       =   &H00FFFFFF&
  1676.          BeginProperty Font 
  1677.             Name            =   "Times New Roman"
  1678.             Size            =   12
  1679.             Charset         =   0
  1680.             Weight          =   700
  1681.             Underline       =   0   'False
  1682.             Italic          =   0   'False
  1683.             Strikethrough   =   0   'False
  1684.          EndProperty
  1685.          Height          =   630
  1686.          Left            =   1110
  1687.          TabIndex        =   27
  1688.          Text            =   "23"
  1689.          Top             =   2820
  1690.          Width           =   504
  1691.       End
  1692.       Begin VB.TextBox Text22 
  1693.          Appearance      =   0  'Flat
  1694.          BackColor       =   &H00FFFFFF&
  1695.          BeginProperty Font 
  1696.             Name            =   "Times New Roman"
  1697.             Size            =   12
  1698.             Charset         =   0
  1699.             Weight          =   700
  1700.             Underline       =   0   'False
  1701.             Italic          =   0   'False
  1702.             Strikethrough   =   0   'False
  1703.          EndProperty
  1704.          Height          =   630
  1705.          Left            =   570
  1706.          TabIndex        =   26
  1707.          Text            =   "22"
  1708.          Top             =   2820
  1709.          Width           =   504
  1710.       End
  1711.       Begin VB.TextBox Text21 
  1712.          Appearance      =   0  'Flat
  1713.          BackColor       =   &H00FFFFFF&
  1714.          BeginProperty Font 
  1715.             Name            =   "Times New Roman"
  1716.             Size            =   12
  1717.             Charset         =   0
  1718.             Weight          =   700
  1719.             Underline       =   0   'False
  1720.             Italic          =   0   'False
  1721.             Strikethrough   =   0   'False
  1722.          EndProperty
  1723.          Height          =   630
  1724.          Left            =   30
  1725.          TabIndex        =   25
  1726.          Text            =   "21"
  1727.          Top             =   2820
  1728.          Width           =   504
  1729.       End
  1730.       Begin VB.TextBox Text20 
  1731.          Appearance      =   0  'Flat
  1732.          BackColor       =   &H00FFFFFF&
  1733.          BeginProperty Font 
  1734.             Name            =   "Times New Roman"
  1735.             Size            =   12
  1736.             Charset         =   0
  1737.             Weight          =   700
  1738.             Underline       =   0   'False
  1739.             Italic          =   0   'False
  1740.             Strikethrough   =   0   'False
  1741.          EndProperty
  1742.          Height          =   630
  1743.          Left            =   4890
  1744.          TabIndex        =   24
  1745.          Text            =   "20"
  1746.          Top             =   2160
  1747.          Width           =   504
  1748.       End
  1749.       Begin VB.TextBox Text19 
  1750.          Appearance      =   0  'Flat
  1751.          BackColor       =   &H00FFFFFF&
  1752.          BeginProperty Font 
  1753.             Name            =   "Times New Roman"
  1754.             Size            =   12
  1755.             Charset         =   0
  1756.             Weight          =   700
  1757.             Underline       =   0   'False
  1758.             Italic          =   0   'False
  1759.             Strikethrough   =   0   'False
  1760.          EndProperty
  1761.          Height          =   630
  1762.          Left            =   4350
  1763.          TabIndex        =   23
  1764.          Text            =   "19"
  1765.          Top             =   2160
  1766.          Width           =   504
  1767.       End
  1768.       Begin VB.TextBox Text18 
  1769.          Appearance      =   0  'Flat
  1770.          BackColor       =   &H00FFFFFF&
  1771.          BeginProperty Font 
  1772.             Name            =   "Times New Roman"
  1773.             Size            =   12
  1774.             Charset         =   0
  1775.             Weight          =   700
  1776.             Underline       =   0   'False
  1777.             Italic          =   0   'False
  1778.             Strikethrough   =   0   'False
  1779.          EndProperty
  1780.          Height          =   630
  1781.          Left            =   3810
  1782.          TabIndex        =   22
  1783.          Text            =   "18"
  1784.          Top             =   2160
  1785.          Width           =   504
  1786.       End
  1787.       Begin VB.TextBox Text17 
  1788.          Appearance      =   0  'Flat
  1789.          BackColor       =   &H00FFFFFF&
  1790.          BeginProperty Font 
  1791.             Name            =   "Times New Roman"
  1792.             Size            =   12
  1793.             Charset         =   0
  1794.             Weight          =   700
  1795.             Underline       =   0   'False
  1796.             Italic          =   0   'False
  1797.             Strikethrough   =   0   'False
  1798.          EndProperty
  1799.          Height          =   630
  1800.          Left            =   3270
  1801.          TabIndex        =   21
  1802.          Text            =   "17"
  1803.          Top             =   2160
  1804.          Width           =   504
  1805.       End
  1806.       Begin VB.TextBox Text16 
  1807.          Appearance      =   0  'Flat
  1808.          BackColor       =   &H00FFFFFF&
  1809.          BeginProperty Font 
  1810.             Name            =   "Times New Roman"
  1811.             Size            =   12
  1812.             Charset         =   0
  1813.             Weight          =   700
  1814.             Underline       =   0   'False
  1815.             Italic          =   0   'False
  1816.             Strikethrough   =   0   'False
  1817.          EndProperty
  1818.          Height          =   630
  1819.          Left            =   2730
  1820.          TabIndex        =   20
  1821.          Text            =   "16"
  1822.          Top             =   2160
  1823.          Width           =   504
  1824.       End
  1825.       Begin VB.TextBox Text15 
  1826.          Appearance      =   0  'Flat
  1827.          BackColor       =   &H00FFFFFF&
  1828.          BeginProperty Font 
  1829.             Name            =   "Times New Roman"
  1830.             Size            =   12
  1831.             Charset         =   0
  1832.             Weight          =   700
  1833.             Underline       =   0   'False
  1834.             Italic          =   0   'False
  1835.             Strikethrough   =   0   'False
  1836.          EndProperty
  1837.          Height          =   630
  1838.          Left            =   2190
  1839.          TabIndex        =   19
  1840.          Text            =   "15"
  1841.          Top             =   2160
  1842.          Width           =   504
  1843.       End
  1844.       Begin VB.TextBox Text14 
  1845.          Appearance      =   0  'Flat
  1846.          BackColor       =   &H00FFFFFF&
  1847.          BeginProperty Font 
  1848.             Name            =   "Times New Roman"
  1849.             Size            =   12
  1850.             Charset         =   0
  1851.             Weight          =   700
  1852.             Underline       =   0   'False
  1853.             Italic          =   0   'False
  1854.             Strikethrough   =   0   'False
  1855.          EndProperty
  1856.          Height          =   630
  1857.          Left            =   1650
  1858.          TabIndex        =   18
  1859.          Text            =   "14"
  1860.          Top             =   2160
  1861.          Width           =   504
  1862.       End
  1863.       Begin VB.TextBox Text13 
  1864.          Appearance      =   0  'Flat
  1865.          BackColor       =   &H00FFFFFF&
  1866.          BeginProperty Font 
  1867.             Name            =   "Times New Roman"
  1868.             Size            =   12
  1869.             Charset         =   0
  1870.             Weight          =   700
  1871.             Underline       =   0   'False
  1872.             Italic          =   0   'False
  1873.             Strikethrough   =   0   'False
  1874.          EndProperty
  1875.          Height          =   630
  1876.          Left            =   1110
  1877.          TabIndex        =   17
  1878.          Text            =   "13"
  1879.          Top             =   2160
  1880.          Width           =   504
  1881.       End
  1882.       Begin VB.TextBox Text12 
  1883.          Appearance      =   0  'Flat
  1884.          BackColor       =   &H00FFFFFF&
  1885.          BeginProperty Font 
  1886.             Name            =   "Times New Roman"
  1887.             Size            =   12
  1888.             Charset         =   0
  1889.             Weight          =   700
  1890.             Underline       =   0   'False
  1891.             Italic          =   0   'False
  1892.             Strikethrough   =   0   'False
  1893.          EndProperty
  1894.          Height          =   630
  1895.          Left            =   570
  1896.          TabIndex        =   16
  1897.          Text            =   "12"
  1898.          Top             =   2160
  1899.          Width           =   504
  1900.       End
  1901.       Begin VB.TextBox Text11 
  1902.          Appearance      =   0  'Flat
  1903.          BackColor       =   &H00FFFFFF&
  1904.          BeginProperty Font 
  1905.             Name            =   "Times New Roman"
  1906.             Size            =   12
  1907.             Charset         =   0
  1908.             Weight          =   700
  1909.             Underline       =   0   'False
  1910.             Italic          =   0   'False
  1911.             Strikethrough   =   0   'False
  1912.          EndProperty
  1913.          Height          =   630
  1914.          Left            =   30
  1915.          TabIndex        =   15
  1916.          Text            =   "11"
  1917.          Top             =   2160
  1918.          Width           =   504
  1919.       End
  1920.       Begin VB.TextBox Text10 
  1921.          Appearance      =   0  'Flat
  1922.          BackColor       =   &H00FFFFFF&
  1923.          BeginProperty Font 
  1924.             Name            =   "Times New Roman"
  1925.             Size            =   12
  1926.             Charset         =   0
  1927.             Weight          =   700
  1928.             Underline       =   0   'False
  1929.             Italic          =   0   'False
  1930.             Strikethrough   =   0   'False
  1931.          EndProperty
  1932.          Height          =   630
  1933.          Left            =   4890
  1934.          TabIndex        =   14
  1935.          Text            =   "10"
  1936.          Top             =   1500
  1937.          Width           =   504
  1938.       End
  1939.       Begin VB.TextBox Text9 
  1940.          Appearance      =   0  'Flat
  1941.          BackColor       =   &H00FFFFFF&
  1942.          BeginProperty Font 
  1943.             Name            =   "Times New Roman"
  1944.             Size            =   12
  1945.             Charset         =   0
  1946.             Weight          =   700
  1947.             Underline       =   0   'False
  1948.             Italic          =   0   'False
  1949.             Strikethrough   =   0   'False
  1950.          EndProperty
  1951.          Height          =   630
  1952.          Left            =   4350
  1953.          TabIndex        =   13
  1954.          Text            =   "9"
  1955.          Top             =   1500
  1956.          Width           =   504
  1957.       End
  1958.       Begin VB.TextBox Text8 
  1959.          Appearance      =   0  'Flat
  1960.          BackColor       =   &H00FFFFFF&
  1961.          BeginProperty Font 
  1962.             Name            =   "Times New Roman"
  1963.             Size            =   12
  1964.             Charset         =   0
  1965.             Weight          =   700
  1966.             Underline       =   0   'False
  1967.             Italic          =   0   'False
  1968.             Strikethrough   =   0   'False
  1969.          EndProperty
  1970.          Height          =   630
  1971.          Left            =   3810
  1972.          TabIndex        =   12
  1973.          Text            =   "8"
  1974.          Top             =   1500
  1975.          Width           =   504
  1976.       End
  1977.       Begin VB.TextBox Text7 
  1978.          Appearance      =   0  'Flat
  1979.          BackColor       =   &H00FFFFFF&
  1980.          BeginProperty Font 
  1981.             Name            =   "Times New Roman"
  1982.             Size            =   12
  1983.             Charset         =   0
  1984.             Weight          =   700
  1985.             Underline       =   0   'False
  1986.             Italic          =   0   'False
  1987.             Strikethrough   =   0   'False
  1988.          EndProperty
  1989.          Height          =   630
  1990.          Left            =   3270
  1991.          TabIndex        =   11
  1992.          Text            =   "7"
  1993.          Top             =   1500
  1994.          Width           =   504
  1995.       End
  1996.       Begin VB.TextBox Text6 
  1997.          Appearance      =   0  'Flat
  1998.          BackColor       =   &H00FFFFFF&
  1999.          BeginProperty Font 
  2000.             Name            =   "Times New Roman"
  2001.             Size            =   12
  2002.             Charset         =   0
  2003.             Weight          =   700
  2004.             Underline       =   0   'False
  2005.             Italic          =   0   'False
  2006.             Strikethrough   =   0   'False
  2007.          EndProperty
  2008.          Height          =   630
  2009.          Left            =   2730
  2010.          TabIndex        =   10
  2011.          Text            =   "6"
  2012.          Top             =   1500
  2013.          Width           =   504
  2014.       End
  2015.       Begin VB.TextBox Text5 
  2016.          Appearance      =   0  'Flat
  2017.          BackColor       =   &H00FFFFFF&
  2018.          BeginProperty Font 
  2019.             Name            =   "Times New Roman"
  2020.             Size            =   12
  2021.             Charset         =   0
  2022.             Weight          =   700
  2023.             Underline       =   0   'False
  2024.             Italic          =   0   'False
  2025.             Strikethrough   =   0   'False
  2026.          EndProperty
  2027.          Height          =   630
  2028.          Left            =   2190
  2029.          TabIndex        =   9
  2030.          Text            =   "5"
  2031.          Top             =   1500
  2032.          Width           =   504
  2033.       End
  2034.       Begin VB.TextBox Text4 
  2035.          Appearance      =   0  'Flat
  2036.          BackColor       =   &H00FFFFFF&
  2037.          BeginProperty Font 
  2038.             Name            =   "Times New Roman"
  2039.             Size            =   12
  2040.             Charset         =   0
  2041.             Weight          =   700
  2042.             Underline       =   0   'False
  2043.             Italic          =   0   'False
  2044.             Strikethrough   =   0   'False
  2045.          EndProperty
  2046.          Height          =   630
  2047.          Left            =   1650
  2048.          TabIndex        =   8
  2049.          Text            =   "4"
  2050.          Top             =   1500
  2051.          Width           =   504
  2052.       End
  2053.       Begin VB.TextBox Text3 
  2054.          Appearance      =   0  'Flat
  2055.          BackColor       =   &H00FFFFFF&
  2056.          BeginProperty Font 
  2057.             Name            =   "Times New Roman"
  2058.             Size            =   12
  2059.             Charset         =   0
  2060.             Weight          =   700
  2061.             Underline       =   0   'False
  2062.             Italic          =   0   'False
  2063.             Strikethrough   =   0   'False
  2064.          EndProperty
  2065.          Height          =   630
  2066.          Left            =   1110
  2067.          TabIndex        =   7
  2068.          Text            =   "3"
  2069.          Top             =   1500
  2070.          Width           =   504
  2071.       End
  2072.       Begin VB.TextBox Text2 
  2073.          Appearance      =   0  'Flat
  2074.          BackColor       =   &H00FFFFFF&
  2075.          BeginProperty Font 
  2076.             Name            =   "Times New Roman"
  2077.             Size            =   12
  2078.             Charset         =   0
  2079.             Weight          =   700
  2080.             Underline       =   0   'False
  2081.             Italic          =   0   'False
  2082.             Strikethrough   =   0   'False
  2083.          EndProperty
  2084.          Height          =   630
  2085.          Left            =   570
  2086.          TabIndex        =   6
  2087.          Text            =   "2"
  2088.          Top             =   1500
  2089.          Width           =   504
  2090.       End
  2091.       Begin VB.TextBox Text1 
  2092.          Appearance      =   0  'Flat
  2093.          BackColor       =   &H00FFFFFF&
  2094.          BeginProperty Font 
  2095.             Name            =   "Times New Roman"
  2096.             Size            =   12
  2097.             Charset         =   0
  2098.             Weight          =   700
  2099.             Underline       =   0   'False
  2100.             Italic          =   0   'False
  2101.             Strikethrough   =   0   'False
  2102.          EndProperty
  2103.          Height          =   630
  2104.          Left            =   30
  2105.          TabIndex        =   5
  2106.          Text            =   "1"
  2107.          Top             =   1500
  2108.          Width           =   504
  2109.       End
  2110.       Begin VB.Frame Frame2 
  2111.          Appearance      =   0  'Flat
  2112.          BackColor       =   &H80000005&
  2113.          Caption         =   "Ways"
  2114.          ForeColor       =   &H80000008&
  2115.          Height          =   5775
  2116.          Left            =   5460
  2117.          TabIndex        =   4
  2118.          Top             =   1410
  2119.          Width           =   1875
  2120.       End
  2121.       Begin VB.Frame Frame3 
  2122.          Appearance      =   0  'Flat
  2123.          BackColor       =   &H80000005&
  2124.          Caption         =   "First Game"
  2125.          ForeColor       =   &H80000008&
  2126.          Height          =   615
  2127.          Left            =   90
  2128.          TabIndex        =   3
  2129.          Top             =   150
  2130.          Width           =   2235
  2131.       End
  2132.       Begin VB.Frame Frame4 
  2133.          Appearance      =   0  'Flat
  2134.          BackColor       =   &H80000005&
  2135.          Caption         =   "Last Game"
  2136.          ForeColor       =   &H80000008&
  2137.          Height          =   615
  2138.          Left            =   90
  2139.          TabIndex        =   2
  2140.          Top             =   810
  2141.          Width           =   2265
  2142.       End
  2143.       Begin VB.Frame Frame5 
  2144.          Appearance      =   0  'Flat
  2145.          BackColor       =   &H80000005&
  2146.          Caption         =   "No. of Games"
  2147.          ForeColor       =   &H80000008&
  2148.          Height          =   1215
  2149.          Left            =   3960
  2150.          TabIndex        =   1
  2151.          Top             =   180
  2152.          Width           =   1875
  2153.       End
  2154.       Begin VB.Image Image1 
  2155.          Height          =   1200
  2156.          Left            =   6090
  2157.          Picture         =   "Form3.frx":0000
  2158.          Stretch         =   -1  'True
  2159.          Top             =   150
  2160.          Width           =   1230
  2161.       End
  2162.       Begin VB.Label Label1 
  2163.          AutoSize        =   -1  'True
  2164.          BackColor       =   &H00FFFFFF&
  2165.          Caption         =   "KENO"
  2166.          BeginProperty Font 
  2167.             Name            =   "Comic Sans MS"
  2168.             Size            =   24
  2169.             Charset         =   0
  2170.             Weight          =   400
  2171.             Underline       =   0   'False
  2172.             Italic          =   0   'False
  2173.             Strikethrough   =   0   'False
  2174.          EndProperty
  2175.          Height          =   675
  2176.          Left            =   2460
  2177.          TabIndex        =   85
  2178.          Top             =   240
  2179.          Width           =   1380
  2180.       End
  2181.       Begin VB.Line Line1 
  2182.          BorderWidth     =   5
  2183.          X1              =   2490
  2184.          X2              =   3840
  2185.          Y1              =   1050
  2186.          Y2              =   900
  2187.       End
  2188.    End
  2189.    Begin VB.Menu mnuprint 
  2190.       Caption         =   "Print ME"
  2191.    End
  2192. Attribute VB_Name = "Form3"
  2193. Attribute VB_GlobalNameSpace = False
  2194. Attribute VB_Creatable = False
  2195. Attribute VB_PredeclaredId = True
  2196. Attribute VB_Exposed = False
  2197. Private Sub mnuprint_Click()
  2198. On CommonDialog1.CancelError GoTo errhandler
  2199. CommonDialog1.ShowPrinter
  2200. Printer.Copies = CommonDialog1.Copies
  2201. Me.PrintForm
  2202. Exit Sub
  2203. errhandler:
  2204. Exit Sub
  2205. End Sub
  2206.